#!/usr/bin/perl

# $Id: 02_tega_strorageapi.t 42 2010-11-12 11:57:20Z dolbanavt@googlemail.com $
# $Date: 2010-11-12 13:57:34 +0200 (Птн, 12 Ноя 2010) $
# $HeadURL: https://tegusigalpa.googlecode.com/svn/branches/storage_init/t/02_tega_strorageapi.t $
# $LastChangedRevision$

use FindBin qw( $RealBin );
use File::Spec::Functions qw( catfile );

BEGIN {
    push @INC, catfile( $RealBin, '..', 'base_lib' );
    push @INC, catfile( $RealBin, '..', 'lib' );
}

use JIP::ToolSet;
use Test::More tests => 4;
use English qw( -no_match_vars );
use Const::Fast qw( const );
use Test::Exception;
use version 0.77;

const my $MODULE         => 'Tega::StorageAPI';
const my $WANTED_VERSION => '0.0.1';

use_ok $MODULE;
require_ok $MODULE;

my $has_actual_version = version->parse( $MODULE->VERSION )
    >= version->parse( $WANTED_VERSION );

ok $has_actual_version, 'has actual VERSION';

can_ok $MODULE, qw(
    echo
    add_seen_action
);
